home *** CD-ROM | disk | FTP | other *** search
/ Go64! / Go64_2002-09_2002_CSW_Side_A.d64 / calculate psptab (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  137b  |  10 lines

  1. 10 tb=22528
  2. 50 d=192
  3. 60 f=0.745
  4. 70 za=128
  5. 100 forx=0to255
  6. 300 y=f*d/(((x+za)and255)+d)
  7. 400 poketb+x,(256*y)and255
  8. 500 next
  9. 1000 poketb-za+256,255
  10.